home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 1
/
Cream of the Crop 1.iso
/
PROGRAM
/
QBWIZ12.ARJ
/
COMMANDL.ASM
< prev
next >
Wrap
Assembly Source File
|
1991-02-20
|
2KB
|
61 lines
comment #
+----------------------------------------------------------------------+
| |
| QBWIZ Copyright (c) 1990-1991 Thomas G. Hanlin III |
| |
| QuickBASIC Access Library |
| |
| assembled with the excellent OPTASM by SLR |
| |
+----------------------------------------------------------------------+
#
public COMMANDLINE
.model medium
.code
COMMANDLINE proc ; get original command line
push si
push di
push ds
push es
push ds
pop es
lea di,StrBuf
lds si,dword ptr __acmdln
xor cx,cx
#GetCmd: lodsb
cmp al,13
je #Done
stosb
inc cx
jmp #GetCmd
#Done: pop es
pop ds
pop di
pop si
mov StrHeader,cx
lea ax,StrHeader
ret
COMMANDLINE endp ; get original command line
.data
StrHeader dw 0, StrBuf
StrBuf db 255 dup(?)
extrn __acmdln: dword
end